home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 26 / Cream of the Crop 26.iso / program / ddj0897.zip / RCSC.ZIP / LIB51 / STRCHR.C < prev    next >
Text File  |  1997-01-12  |  188b  |  12 lines
  1. /*
  2. ** return pointer to 1st occurrence of c in str, else 0
  3. */
  4. strchr(str, c) char *str, c; {
  5.   while(*str) {
  6.     if(*str == c) return (str);
  7.     ++str;
  8.     }
  9.   return (0);
  10.   }
  11.  
  12.